home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2010 April / PCWorld0410.iso / hity wydania / Ubuntu 9.10 PL / karmelkowy-koliberek-desktop-9.10-i386-PL.iso / casper / filesystem.squashfs / usr / share / mc / extfs / uar < prev    next >
Text File  |  2009-10-25  |  1KB  |  61 lines
  1. #!/bin/sh
  2. #
  3. # Written by    Alex Kuchma <ask@bcs.zp.ua>
  4. #               Alex Tkachenko <alex@bcs.zp.ua>
  5. # Updated by    Vitezslav Samel <xsamel00@dcse.fee.vutbr.cz>
  6. #
  7. # (C) 1997, 1998 The Free Software Foundation.
  8. #
  9. #
  10.  
  11. XAR=ar
  12.  
  13. mcarfs_list ()
  14. {
  15.     # If $temp_replace string is part of the filename that part might get lost
  16.     temp_replace='Unique Separator String'
  17.     thisyear="`date +%Y`"
  18.     $XAR tv "$1" | sed 's,^,-,;s, , 1 ,;s,/, ,' |
  19.     sed -e "s/\( [0-2][0-9]\:[0-5][0-9]\)\( $thisyear \)\(.*\)/\1$temp_replace\3/" |
  20.     sed -e "s/\( [0-2][0-9]\:[0-5][0-9] \)\([12][0-9][0-9][0-9] \)\(.*\)/ \2\3/" |
  21.     sed -e "s/$temp_replace/ /"
  22. }
  23.  
  24. mcarfs_copyout ()
  25. {
  26.     $XAR p "$1" "$2" > "$3"
  27. }
  28.  
  29. mcarfs_copyin ()
  30. {
  31.     TMPDIR=`mktemp -d "${MC_TMPDIR:-/tmp}/mctmpdir-uar.XXXXXX"` || exit 1
  32.     name=`basename "$2"`
  33.     (cd "$TMPDIR" && cp -fp "$3" "$name" && $XAR r "$1" "$name")
  34.     rm -rf "$TMPDIR"
  35. }
  36.  
  37. mcarfs_rm ()
  38. {
  39.     $XAR d "$1" "$2"
  40. }
  41.  
  42. # override any locale for dates
  43. LC_ALL=C
  44. export LC_ALL
  45.  
  46. umask 077
  47. case "$1" in
  48.   list) mcarfs_list "$2" ;;
  49.   copyout) shift; mcarfs_copyout "$@" ;;
  50.   copyin) shift; mcarfs_copyin "$@" ;;
  51.   rm) shift; mcarfs_rm "$@" ;;
  52.   mkdir|rmdir)
  53.     echo "mcarfs: ar archives cannot contain directories." 1>&2
  54.     exit 1;;
  55.   *)
  56.     echo "mcarfs: unknown command: \"$1\"." 1>&2
  57.     exit 1;;
  58. esac
  59.  
  60. exit 0
  61.